home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Astromacronomer ••• / BASIC Runtime / BASIC Runtime.rsrc / CODE_18.txt < prev    next >
Text File  |  1986-09-30  |  23KB  |  405 lines
  1. # near model CODE resource
  2. # jump table entries: 4056-4060 (5 of them)
  3. export_507:
  4. 00000000  526D FE52                addq.w     [A5 - 0x1AE], 1
  5. 00000004  4A01                     tst.b      D1
  6. 00000006  665E                     bne        +0x60 /* 00000066 */
  7. 00000008  4E56 FFF8                link       A6, -0x0008
  8. 0000000C  97CB                     sub.l      A3, A3
  9. 0000000E  7A01                     moveq.l    D5, 0x01
  10. 00000010  0C40 0087                cmpi.w     D0, 0x87
  11. 00000014  660A                     bne        +0xC /* 00000020 */
  12. 00000016  6100 0402                bsr        +0x404 /* 0000041A */
  13. 0000001A  4EAD 0C02                jsr        [A5 + 0xC02 /* export_380 */]
  14. 0000001E  603E                     bra        +0x40 /* 0000005E */
  15. label00000020:
  16. 00000020  6100 0404                bsr        +0x406 /* 00000426 */
  17. 00000024  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  18. 00000028  4EAD 045A                jsr        [A5 + 0x45A /* export_135 */]
  19. 0000002C  3802                     move.w     D4, D2
  20. 0000002E  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  21. 00000032  6728                     beq        +0x2A /* 0000005C */
  22. 00000034  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  23. 00000038  4EAD 02CA                jsr        [A5 + 0x2CA /* export_85 */]
  24. 0000003C  4EAD 0322                jsr        [A5 + 0x322 /* export_96 */]
  25. 00000040  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  26. 00000044  43EE FFF8                lea.l      A1, [A6 - 0x8]
  27. 00000048  4EAD 0C7A                jsr        [A5 + 0xC7A /* export_395 */]
  28. 0000004C  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  29. 00000050  670A                     beq        +0xC /* 0000005C */
  30. 00000052  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  31. 00000056  4EAD 045A                jsr        [A5 + 0x45A /* export_135 */]
  32. 0000005A  3A02                     move.w     D5, D2
  33. label0000005C:
  34. 0000005C  612E                     bsr        +0x30 /* 0000008C */
  35. label0000005E:
  36. 0000005E  4E5E                     unlink     A6
  37. 00000060  536D FE52                subq.w     [A5 - 0x1AE], 1
  38. 00000064  4E75                     rts
  39. label00000066:
  40. 00000066  2F08                     move.l     -[A7], A0
  41. 00000068  4EAD 0032                jsr        [A5 + 0x32 /* export_2 */]
  42. 0000006C  4A43                     tst.w      D3
  43. 0000006E  6718                     beq        +0x1A /* 00000088 */
  44. 00000070  4EAD 0C1A                jsr        [A5 + 0xC1A /* export_383 */]
  45. 00000074  2050                     movea.l    A0, [A0]
  46. 00000076  7600                     moveq.l    D3, 0x00
  47. 00000078  1628 0024                move.b     D3, [A0 + 0x24]
  48. 0000007C  4EAD 01AA                jsr        [A5 + 0x1AA /* export_49 */]
  49. 00000080  205F                     movea.l    A0, [A7]+
  50. 00000082  536D FE52                subq.w     [A5 - 0x1AE], 1
  51. 00000086  4E75                     rts
  52. label00000088:
  53. 00000088  4EED 0182                jmp        [A5 + 0x182 /* export_44 */]
  54. fn0000008C:
  55. 0000008C  2F08                     move.l     -[A7], A0
  56. 0000008E  2849                     movea.l    A4, A1
  57. 00000090  5345                     subq.w     D5, 1
  58. 00000092  0C45 0003                cmpi.w     D5, 0x3
  59. 00000096  64F0                     bcc        -0xE /* 00000088 */
  60. 00000098  0C44 0003                cmpi.w     D4, 0x3
  61. 0000009C  64EA                     bcc        -0x14 /* 00000088 */
  62. 0000009E  4EAD 0C12                jsr        [A5 + 0xC12 /* export_382 */]
  63. 000000A2  2E0B                     move.l     D7, A3
  64. 000000A4  6736                     beq        +0x38 /* 000000DC */
  65. 000000A6  2010                     move.l     D0, [A0]
  66. 000000A8  6708                     beq        +0xA /* 000000B2 */
  67. 000000AA  4EAD 0C02                jsr        [A5 + 0xC02 /* export_380 */]
  68. 000000AE  4EAD 0C12                jsr        [A5 + 0xC12 /* export_382 */]
  69. label000000B2:
  70. 000000B2  4EAD 086A                jsr        [A5 + 0x86A /* export_265 */]
  71. 000000B6  42A7                     clr.l      -[A7]
  72. 000000B8  4EAD 09FA                jsr        [A5 + 0x9FA /* export_315 */]
  73. 000000BC  2F00                     move.l     -[A7], D0
  74. 000000BE  2F0C                     move.l     -[A7], A4
  75. 000000C0  486D ED88                pea.l      [A5 - 0x1278]
  76. 000000C4  3F3C FFFF                move.w     -[A7], 0xFFFF
  77. 000000C8  4267                     clr.w      -[A7]
  78. 000000CA  4267                     clr.w      -[A7]
  79. 000000CC  3F3C 0001                move.w     -[A7], 0x1
  80. 000000D0  3F05                     move.w     -[A7], D5
  81. 000000D2  42A7                     clr.l      -[A7]
  82. 000000D4  A954                     syscall    NewControl
  83. 000000D6  4EAD 0C0A                jsr        [A5 + 0xC0A /* export_381 */]
  84. 000000DA  209F                     move.l     [A0], [A7]+
  85. label000000DC:
  86. 000000DC  4EAD 0C1A                jsr        [A5 + 0xC1A /* export_383 */]
  87. 000000E0  2F08                     move.l     -[A7], A0
  88. 000000E2  2F08                     move.l     -[A7], A0
  89. 000000E4  2050                     movea.l    A0, [A0]
  90. 000000E6  1144 0024                move.b     [A0 + 0x24], D4
  91. 000000EA  7200                     moveq.l    D1, 0x00
  92. 000000EC  4A04                     tst.b      D4
  93. 000000EE  6602                     bne        +0x4 /* 000000F2 */
  94. 000000F0  5301                     subq.b     D1, 1
  95. label000000F2:
  96. 000000F2  3F01                     move.w     -[A7], D1
  97. 000000F4  A95D                     syscall    HiliteControl
  98. 000000F6  7201                     moveq.l    D1, 0x01
  99. 000000F8  0C04 0002                cmpi.b     D4, 0x2
  100. 000000FC  6702                     beq        +0x4 /* 00000100 */
  101. 000000FE  7200                     moveq.l    D1, 0x00
  102. label00000100:
  103. 00000100  3F01                     move.w     -[A7], D1
  104. 00000102  A963                     syscall    SetControlValue/SetCtlValue
  105. 00000104  205F                     movea.l    A0, [A7]+
  106. 00000106  4E75                     rts
  107. export_508:
  108. 00000108  526D FE52                addq.w     [A5 - 0x1AE], 1
  109. 0000010C  4A01                     tst.b      D1
  110. 0000010E  6626                     bne        +0x28 /* 00000136 */
  111. 00000110  0C40 F9F4                cmpi.w     D0, 0xF9F4
  112. 00000114  6606                     bne        +0x8 /* 0000011C */
  113. 00000116  422D FB34                clr.b      [A5 - 0x4CC]
  114. 0000011A  600E                     bra        +0x10 /* 0000012A */
  115. label0000011C:
  116. 0000011C  43ED F086                lea.l      A1, [A5 - 0xF7A]
  117. 00000120  0811 0001                btst.b     [A1], 0x1
  118. 00000124  6604                     bne        +0x6 /* 0000012A */
  119. 00000126  4EAD 0952                jsr        [A5 + 0x952 /* export_294 */]
  120. label0000012A:
  121. 0000012A  7201                     moveq.l    D1, 0x01
  122. 0000012C  4EAD 062A                jsr        [A5 + 0x62A /* export_193 */]
  123. 00000130  536D FE52                subq.w     [A5 - 0x1AE], 1
  124. 00000134  4E75                     rts
  125. label00000136:
  126. 00000136  4EAD 0032                jsr        [A5 + 0x32 /* export_2 */]
  127. 0000013A  43ED FB02                lea.l      A1, [A5 - 0x4FE]
  128. 0000013E  0C43 0008                cmpi.w     D3, 0x8
  129. 00000142  6400 FF44                bcc        -0xBA /* 00000088 */
  130. 00000146  4A43                     tst.w      D3
  131. 00000148  670A                     beq        +0xC /* 00000154 */
  132. 0000014A  43ED FB2C                lea.l      A1, [A5 - 0x4D4]
  133. 0000014E  1631 3000                move.b     D3, [A1 + D3.w]
  134. 00000152  601A                     bra        +0x1C /* 0000016E */
  135. label00000154:
  136. 00000154  4EAD 0292                jsr        [A5 + 0x292 /* export_78 */]
  137. 00000158  7600                     moveq.l    D3, 0x00
  138. 0000015A  4EAD 08CA                jsr        [A5 + 0x8CA /* export_277 */]
  139. 0000015E  670E                     beq        +0x10 /* 0000016E */
  140. 00000160  3600                     move.w     D3, D0
  141. 00000162  4EAD 08CA                jsr        [A5 + 0x8CA /* export_277 */]
  142. 00000166  43ED FB2C                lea.l      A1, [A5 - 0x4D4]
  143. 0000016A  1380 3000                move.b     [A1 + D3.w], D0
  144. label0000016E:
  145. 0000016E  4EAD 01AA                jsr        [A5 + 0x1AA /* export_49 */]
  146. 00000172  536D FE52                subq.w     [A5 - 0x1AE], 1
  147. 00000176  4E75                     rts
  148. export_509:
  149. 00000178  526D FE52                addq.w     [A5 - 0x1AE], 1
  150. 0000017C  4A01                     tst.b      D1
  151. 0000017E  6674                     bne        +0x76 /* 000001F4 */
  152. 00000180  4E56 FFF8                link       A6, -0x0008
  153. 00000184  97CB                     sub.l      A3, A3
  154. 00000186  7A01                     moveq.l    D5, 0x01
  155. 00000188  7C01                     moveq.l    D6, 0x01
  156. 0000018A  3E3C 0091                move.w     D7, 0x91
  157. 0000018E  4EAD 044A                jsr        [A5 + 0x44A /* export_133 */]
  158. 00000192  0C40 0087                cmpi.w     D0, 0x87
  159. 00000196  660A                     bne        +0xC /* 000001A2 */
  160. 00000198  6100 0280                bsr        +0x282 /* 0000041A */
  161. 0000019C  4EAD 0C42                jsr        [A5 + 0xC42 /* export_388 */]
  162. 000001A0  604A                     bra        +0x4C /* 000001EC */
  163. label000001A2:
  164. 000001A2  6100 0282                bsr        +0x284 /* 00000426 */
  165. 000001A6  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  166. 000001AA  673E                     beq        +0x40 /* 000001EA */
  167. 000001AC  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  168. 000001B0  4EAD 02CA                jsr        [A5 + 0x2CA /* export_85 */]
  169. 000001B4  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  170. 000001B8  43EE FFF8                lea.l      A1, [A6 - 0x8]
  171. 000001BC  4EAD 0C7A                jsr        [A5 + 0xC7A /* export_395 */]
  172. 000001C0  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  173. 000001C4  6724                     beq        +0x26 /* 000001EA */
  174. 000001C6  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  175. 000001CA  0C40 002C                cmpi.w     D0, 0x2C /* ',' */
  176. 000001CE  670C                     beq        +0xE /* 000001DC */
  177. 000001D0  4EAD 045A                jsr        [A5 + 0x45A /* export_135 */]
  178. 000001D4  3A02                     move.w     D5, D2
  179. 000001D6  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  180. 000001DA  670E                     beq        +0x10 /* 000001EA */
  181. label000001DC:
  182. 000001DC  4EAD 02C2                jsr        [A5 + 0x2C2 /* export_84 */]
  183. 000001E0  4EAD 045A                jsr        [A5 + 0x45A /* export_135 */]
  184. 000001E4  3C02                     move.w     D6, D2
  185. 000001E6  4EAD 02DA                jsr        [A5 + 0x2DA /* export_87 */]
  186. label000001EA:
  187. 000001EA  6162                     bsr        +0x64 /* 0000024E */
  188. label000001EC:
  189. 000001EC  4E5E                     unlink     A6
  190. 000001EE  536D FE52                subq.w     [A5 - 0x1AE], 1
  191. 000001F2  4E75                     rts
  192. label000001F4:
  193. 000001F4  4E56 FFE0                link       A6, -0x0020
  194. 000001F8  7E24                     moveq.l    D7, 0x24
  195. 000001FA  4EAD 044A                jsr        [A5 + 0x44A /* export_133 */]
  196. 000001FE  7E28                     moveq.l    D7, 0x28
  197. 00000200  4EAD 044A                jsr        [A5 + 0x44A /* export_133 */]
  198. 00000204  6100 0220                bsr        +0x222 /* 00000426 */
  199. 00000208  7E29                     moveq.l    D7, 0x29
  200. 0000020A  4EAD 044A                jsr        [A5 + 0x44A /* export_133 */]
  201. 0000020E  2F08                     move.l     -[A7], A0
  202. 00000210  43EE FFE0                lea.l      A1, [A6 - 0x20]
  203. 00000214  4EAD 0A32                jsr        [A5 + 0xA32 /* export_322 */]
  204. 00000218  4EAD 0C32                jsr        [A5 + 0xC32 /* export_386 */]
  205. 0000021C  42A7                     clr.l      -[A7]
  206. 0000021E  2F08                     move.l     -[A7], A0
  207. 00000220  A9CB                     syscall    TEGetText
  208. 00000222  285F                     movea.l    A4, [A7]+
  209. 00000224  204C                     movea.l    A0, A4
  210. 00000226  A025                     syscall    GetHandleSize
  211. 00000228  2400                     move.l     D2, D0
  212. 0000022A  4EAD 0072                jsr        [A5 + 0x72 /* export_10 */]
  213. 0000022E  2054                     movea.l    A0, [A4]
  214. 00000230  6002                     bra        +0x4 /* 00000234 */
  215. label00000232:
  216. 00000232  14D8                     move.b     [A2]+, [A0]+
  217. label00000234:
  218. 00000234  51CA FFFC                dbf        D2, -0x6 /* 00000232 */
  219. 00000238  43EE FFE0                lea.l      A1, [A6 - 0x20]
  220. 0000023C  4EAD 088A                jsr        [A5 + 0x88A /* export_269 */]
  221. 00000240  205F                     movea.l    A0, [A7]+
  222. 00000242  4EAD 007A                jsr        [A5 + 0x7A /* export_11 */]
  223. 00000246  4E5E                     unlink     A6
  224. 00000248  536D FE52                subq.w     [A5 - 0x1AE], 1
  225. 0000024C  4E75                     rts
  226. fn0000024E:
  227. 0000024E  4E56 FFEE                link       A6, -0x0012
  228. 00000252  4EAD 0A52                jsr        [A5 + 0xA52 /* export_326 */]
  229. 00000256  2F08                     move.l     -[A7], A0
  230. 00000258  2849                     movea.l    A4, A1
  231. 0000025A  5345                     subq.w     D5, 1
  232. 0000025C  0C45 0008                cmpi.w     D5, 0x8
  233. 00000260  6400 FE26                bcc        -0x1D8 /* 00000088 */
  234. 00000264  5346                     subq.w     D6, 1
  235. 00000266  0C46 0003                cmpi.w     D6, 0x3
  236. 0000026A  6400 FE1C                bcc        -0x1E2 /* 00000088 */
  237. 0000026E  2E0B                     move.l     D7, A3
  238. 00000270  6716                     beq        +0x18 /* 00000288 */
  239. 00000272  5C89                     addq.l     A1, 6
  240. 00000274  3011                     move.w     D0, [A1]
  241. 00000276  3221                     move.w     D1, -[A1]
  242. 00000278  9061                     sub.w      D0, -[A1]
  243. 0000027A  0C40 0010                cmpi.w     D0, 0x10
  244. 0000027E  6D00 FE08                blt        -0x1F6 /* 00000088 */
  245. 00000282  9261                     sub.w      D1, -[A1]
  246. 00000284  6D00 FE02                blt        -0x1FC /* 00000088 */
  247. label00000288:
  248. 00000288  486E FFEE                pea.l      [A6 - 0x12]
  249. 0000028C  A898                     syscall    GetPenState
  250. 0000028E  4EAD 0C52                jsr        [A5 + 0xC52 /* export_390 */]
  251. 00000292  2E0B                     move.l     D7, A3
  252. 00000294  6700 008A                beq        +0x8C /* 00000320 */
  253. 00000298  2010                     move.l     D0, [A0]
  254. 0000029A  6704                     beq        +0x6 /* 000002A0 */
  255. 0000029C  2F00                     move.l     -[A7], D0
  256. 0000029E  A9CD                     syscall    TEDispose
  257. label000002A0:
  258. 000002A0  42A7                     clr.l      -[A7]
  259. 000002A2  2F0C                     move.l     -[A7], A4
  260. 000002A4  2F0C                     move.l     -[A7], A4
  261. 000002A6  A9D2                     syscall    TENew
  262. 000002A8  4EAD 0C4A                jsr        [A5 + 0xC4A /* export_389 */]
  263. 000002AC  209F                     move.l     [A0], [A7]+
  264. 000002AE  4EAD 0C32                jsr        [A5 + 0xC32 /* export_386 */]
  265. 000002B2  0805 0001                btst.b     D5, 0x1
  266. 000002B6  660C                     bne        +0xE /* 000002C4 */
  267. 000002B8  2250                     movea.l    A1, [A0]
  268. 000002BA  43E9 000A                lea.l      A1, [A1 + 0xA]
  269. 000002BE  5359                     subq.w     [A1]+, 1
  270. 000002C0  5259                     addq.w     [A1]+, 1
  271. 000002C2  5251                     addq.w     [A1], 1
  272. label000002C4:
  273. 000002C4  2F08                     move.l     -[A7], A0
  274. 000002C6  2050                     movea.l    A0, [A0]
  275. 000002C8  4868 0008                pea.l      [A0 + 0x8]
  276. 000002CC  A8A3                     syscall    EraseRect
  277. 000002CE  205F                     movea.l    A0, [A7]+
  278. 000002D0  7000                     moveq.l    D0, 0x00
  279. 000002D2  0805 0000                btst.b     D5, 0x0
  280. 000002D6  6702                     beq        +0x4 /* 000002DA */
  281. 000002D8  70FF                     moveq.l    D0, 0xFFFFFFFF
  282. label000002DA:
  283. 000002DA  2250                     movea.l    A1, [A0]
  284. 000002DC  1340 0048                move.b     [A1 + 0x48], D0
  285. 000002E0  4EAD 0082                jsr        [A5 + 0x82 /* export_12 */]
  286. 000002E4  4EAD 008A                jsr        [A5 + 0x8A /* export_13 */]
  287. 000002E8  48C2                     ext.l      D2
  288. 000002EA  2F0B                     move.l     -[A7], A3
  289. 000002EC  2F02                     move.l     -[A7], D2
  290. 000002EE  2F08                     move.l     -[A7], A0
  291. 000002F0  A9CF                     syscall    TESetText
  292. 000002F2  0C46 0002                cmpi.w     D6, 0x2
  293. 000002F6  6602                     bne        +0x4 /* 000002FA */
  294. 000002F8  7CFF                     moveq.l    D6, 0xFFFFFFFF
  295. label000002FA:
  296. 000002FA  3F06                     move.w     -[A7], D6
  297. 000002FC  4EAD 0C32                jsr        [A5 + 0xC32 /* export_386 */]
  298. 00000300  2F08                     move.l     -[A7], A0
  299. 00000302  A9DF                     syscall    TESetAlignment/TESetJust
  300. 00000304  42A7                     clr.l      -[A7]
  301. 00000306  42A7                     clr.l      -[A7]
  302. 00000308  0805 0002                btst.b     D5, 0x2
  303. 0000030C  6606                     bne        +0x8 /* 00000314 */
  304. 0000030E  2EBC 0000 FFFF           move.l     [A7], 0xFFFF
  305. label00000314:
  306. 00000314  4EAD 0C32                jsr        [A5 + 0xC32 /* export_386 */]
  307. 00000318  2F08                     move.l     -[A7], A0
  308. 0000031A  A9D1                     syscall    TESetSelect
  309. 0000031C  4EAD 0C3A                jsr        [A5 + 0xC3A /* export_387 */]
  310. label00000320:
  311. 00000320  4EAD 0C2A                jsr        [A5 + 0xC2A /* export_385 */]
  312. 00000324  486E FFEE                pea.l      [A6 - 0x12]
  313. 00000328  A899                     syscall    SetPenState
  314. 0000032A  205F                     movea.l    A0, [A7]+
  315. 0000032C  4E5E                     unlink     A6
  316. 0000032E  4E75                     rts
  317. export_510:
  318. 00000330  526D FE52                addq.w     [A5 - 0x1AE], 1
  319. 00000334  4E56 FFFC                link       A6, -0x0004
  320. 00000338  48E7 E0C0                movem.l    -[A7], D0,D1,D2,A0,A1
  321. 0000033C  4EAD 09F2                jsr        [A5 + 0x9F2 /* export_314 */]
  322. 00000340  4EAD 0A5A                jsr        [A5 + 0xA5A /* export_327 */]
  323. 00000344  3D42 FFFC                move.w     [A6 - 0x4], D2
  324. 00000348  3D41 FFFE                move.w     [A6 - 0x2], D1
  325. 0000034C  5641                     addq.w     D1, 3
  326. 0000034E  946D F410                sub.w      D2, [A5 - 0xBF0]
  327. 00000352  3B42 F418                move.w     [A5 - 0xBE8], D2
  328. 00000356  3B41 F41A                move.w     [A5 - 0xBE6], D1
  329. 0000035A  D46D F3FE                add.w      D2, [A5 - 0xC02]
  330. 0000035E  3B42 F41C                move.w     [A5 - 0xBE4], D2
  331. 00000362  42A7                     clr.l      -[A7]
  332. 00000364  486D F418                pea.l      [A5 - 0xBE8]
  333. 00000368  486D F418                pea.l      [A5 - 0xBE8]
  334. 0000036C  A9D2                     syscall    TENew
  335. 0000036E  205F                     movea.l    A0, [A7]+
  336. 00000370  2B48 F308                move.l     [A5 - 0xCF8], A0
  337. 00000374  2050                     movea.l    A0, [A0]
  338. 00000376  50E8 0048                st         [A0 + 0x48]
  339. 0000037A  486D F418                pea.l      [A5 - 0xBE8]
  340. 0000037E  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  341. 00000382  A9D3                     syscall    TEUpdate
  342. 00000384  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  343. 00000388  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  344. 0000038C  A893                     syscall    MoveTo
  345. 0000038E  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  346. 00000392  A9D8                     syscall    TEActivate
  347. label00000394:
  348. 00000394  4EAD 00A2                jsr        [A5 + 0xA2 /* export_16 */]
  349. 00000398  663A                     bne        +0x3C /* 000003D4 */
  350. 0000039A  226D F308                movea.l    A1, [A5 - 0xCF8]
  351. 0000039E  4EAD 099A                jsr        [A5 + 0x99A /* export_303 */]
  352. 000003A2  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  353. 000003A6  A9DA                     syscall    TEIdle
  354. 000003A8  4EAD 08D2                jsr        [A5 + 0x8D2 /* export_278 */]
  355. 000003AC  67E6                     beq        -0x18 /* 00000394 */
  356. 000003AE  0C00 000D                cmpi.b     D0, 0xD /* '\r' */
  357. 000003B2  670A                     beq        +0xC /* 000003BE */
  358. 000003B4  3F00                     move.w     -[A7], D0
  359. 000003B6  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  360. 000003BA  A9DC                     syscall    TEKey
  361. 000003BC  60D6                     bra        -0x28 /* 00000394 */
  362. label000003BE:
  363. 000003BE  206D F308                movea.l    A0, [A5 - 0xCF8]
  364. 000003C2  4EAD 0E6A                jsr        [A5 + 0xE6A /* export_457 */]
  365. 000003C6  6118                     bsr        +0x1A /* 000003E0 */
  366. label000003C8:
  367. 000003C8  4CDF 0307                movem.l    D0,D1,D2,A0,A1, [A7]+
  368. 000003CC  4E5E                     unlink     A6
  369. 000003CE  536D FE52                subq.w     [A5 - 0x1AE], 1
  370. 000003D2  4E75                     rts
  371. label000003D4:
  372. 000003D4  610A                     bsr        +0xC /* 000003E0 */
  373. 000003D6  4EAD 0232                jsr        [A5 + 0x232 /* export_66 */]
  374. 000003DA  422D ED88                clr.b      [A5 - 0x1278]
  375. 000003DE  60E8                     bra        -0x16 /* 000003C8 */
  376. fn000003E0:
  377. 000003E0  4EAD 0A5A                jsr        [A5 + 0xA5A /* export_327 */]
  378. 000003E4  3D41 FFFE                move.w     [A6 - 0x2], D1
  379. 000003E8  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  380. 000003EC  A9D9                     syscall    TEDeactivate
  381. 000003EE  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  382. 000003F2  A9CD                     syscall    TEDispose
  383. 000003F4  42AD F308                clr.l      [A5 - 0xCF8]
  384. 000003F8  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  385. 000003FC  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  386. 00000400  A893                     syscall    MoveTo
  387. 00000402  4E75                     rts
  388. export_511:
  389. 00000404  526D FE52                addq.w     [A5 - 0x1AE], 1
  390. 00000408  2F2C 000A                move.l     -[A7], [A4 + 0xA]
  391. 0000040C  4267                     clr.w      -[A7]
  392. 0000040E  2F2D F308                move.l     -[A7], [A5 - 0xCF8]
  393. 00000412  A9D4                     syscall    TEClick
  394. 00000414  536D FE52                subq.w     [A5 - 0x1AE], 1
  395. 00000418  4E75                     rts
  396. fn0000041A:
  397. 0000041A  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  398. 0000041E  6106                     bsr        +0x8 /* 00000426 */
  399. 00000420  3602                     move.w     D3, D2
  400. 00000422  4EED 02DA                jmp        [A5 + 0x2DA /* export_87 */]
  401. fn00000426:
  402. 00000426  4EAD 045A                jsr        [A5 + 0x45A /* export_135 */]
  403. 0000042A  3602                     move.w     D3, D2
  404. 0000042C  4E75                     rts
  405.